**** Period growth rates


 ***graphs
 set scheme plotplain 

 
  use "Temp/Master", clear /// Balanced sample overview
  
  
		drop if expansion==1
		
		
		 
		drop if year<1900
		
		drop if year>2015
		   
 		
		  
				gen log_ordinary_real=log(ordinary_real)
				gen log_tax_non_trade_real=log(tax_non_trade_real)
				 

				 sort iso_n year
				 by iso_n: gen d_log_ordinary_real=d.log_ordinary_real
				 by iso_n: gen d_log_tax_non_trade_real=d.log_tax_non_trade_real
				 
			
				preserve
			
				* 1900-1914	
				
				egen mean_growth190014_i=mean(d_log_ordinary_real) if tin(1900,1914) , by(iso_n)
				egen mean_growth190014_i_taxnontrade=mean(d_log_tax_non_trade_real) if tin(1900,1914) , by(iso_n)
				
				replace mean_growth190014_i=mean_growth190014_i*100
				replace mean_growth190014_i_taxnontrade=mean_growth190014_i_taxnontrade*100
				
				label var mean_growth190014_i "1900-1914"
				label var mean_growth190014_i_taxnontrade "1900-1914"
  
				
				*1919-1939	
				egen mean_growth191939_i=mean(d_log_ordinary_real) if tin(1919,1939) , by(iso_n)
				egen mean_growth191939_i_taxnontrade=mean(d_log_tax_non_trade_real) if tin(1919,1939) , by(iso_n)

				replace mean_growth191939_i=mean_growth191939_i*100
				replace mean_growth191939_i_taxnontrade=mean_growth191939_i_taxnontrade*100
				
				label var mean_growth191939_i "1919-1939"
				label var mean_growth191939_i_taxnontrade "1919-1939"

			 
				*1946-1959	
 				egen mean_growth194659_i=mean(d_log_ordinary_real) if tin(1946,1959) , by(iso_n)
				egen mean_growth194659_i_taxnontrade=mean(d_log_tax_non_trade_real) if tin(1946,1959) , by(iso_n)
				 
				replace mean_growth194659_i=mean_growth194659_i*100
				replace mean_growth194659_i_taxnontrade=mean_growth194659_i_taxnontrade*100
				
				label var mean_growth194659_i "1946-1959"
				label var mean_growth194659_i_taxnontrade "1946-1959"

				*1960-1979	
				egen mean_growth196079_i=mean(d_log_ordinary_real) if tin(1960,1979) , by(iso_n)
				egen mean_growth196079_i_taxnontrade=mean(d_log_tax_non_trade_real) if tin(1960,1979) , by(iso_n)
				
				replace mean_growth196079_i=mean_growth196079_i*100
				replace mean_growth196079_i_taxnontrade=mean_growth196079_i_taxnontrade*100
				
				label var mean_growth196079_i "1960-1979"
				label var mean_growth196079_i_taxnontrade "1960-1979"

				 				
				*1980-2000	
				egen mean_growth19801999_i=mean(d_log_ordinary_real) if tin(1980,1999) , by(iso_n)
				egen mean_growth198099_i_taxnontrade=mean(d_log_tax_non_trade_real) if tin(1980,1999) , by(iso_n)
				
				replace mean_growth19801999_i=mean_growth19801999_i*100
				replace  mean_growth198099_i_taxnontrade= mean_growth198099_i_taxnontrade*100
				
				label var mean_growth19801999_i "1980-1999"
				label var mean_growth198099_i_taxnontrade "1980-1999"

				 				
				*2001-2015
				
				egen mean_growth2000115_i=mean(d_log_ordinary_real) if tin(2000,2015) , by(iso_n)
				egen mean_growth2015_i_taxnontrade=mean(d_log_tax_non_trade_real) if tin(2000,2015) , by(iso_n)
				
				replace mean_growth2000115_i=mean_growth2000115_i*100
				replace mean_growth2015_i_taxnontrade=mean_growth2015_i_taxnontrade*100
				
				label var mean_growth2000115_i "2000-2015"
				label var mean_growth2015_i_taxnontrade "2000-2015"
				
				
				**** WORLD WARS 
				
							*World WAR 1 
							
							
							egen mean_growthWW1_i=mean(d_log_ordinary_real) if tin(1914,1918) , by(iso_n)
							egen mean_growthWW1_i_taxnontrade=mean(d_log_tax_non_trade_real) if tin(1914,1918) , by(iso_n)
							
							replace mean_growthWW1_i=mean_growthWW1_i*100
							replace mean_growthWW1_i_taxnontrade=mean_growthWW1_i_taxnontrade*100
							
							label var mean_growthWW1_i "World War I"
							label var mean_growthWW1_i_taxnontrade "World War I"
							
					
							* World War II 
							egen mean_growthWW2_i=mean(d_log_ordinary_real) if tin(1939,1945) , by(iso_n)
							egen mean_growthWW2_i_taxnontrade=mean(d_log_tax_non_trade_real) if tin(1939,1945) , by(iso_n)
							
							replace mean_growthWW2_i=mean_growthWW2_i*100
							replace mean_growthWW2_i_taxnontrade=mean_growthWW2_i_taxnontrade*100
							
							label var mean_growthWW2_i "World War II"
							label var mean_growthWW2_i_taxnontrade "World War II"
							
							
							
				
				 
				
				* Ordinary
 				estpost summarize mean_growth190014_i mean_growth191939_i mean_growth194659_i mean_growth196079_i mean_growth19801999_i mean_growth2000115_i     mean_growthWW1_i mean_growthWW2_i
				
				
				
 				
				
				* Non-trade taxes
				estpost summarize mean_growth190014_i_taxnontrade mean_growth191939_i_taxnontrade mean_growth194659_i_taxnontrade mean_growth196079_i_taxnontrade mean_growth198099_i_taxnontrade mean_growth2015_i_taxnontrade   mean_growthWW1_i_taxnontrade mean_growthWW2_i_taxnontrade
				
				
				
				esttab   using "Output/Tables/Appendix/APP_TAB_4_2.tex",  cells("mean(fmt(2)) sd(fmt(2))  ") noobs title("Growth rates - Real Tax revenues excluding trade taxes(in \%)") label replace 				addnotes("Std. is the variation of the respective average cross rates across countries ")
				
 
			restore
			 
